home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Peter Lewis / PNL Libraries / MyPlotIconID.p < prev    next >
Encoding:
Text File  |  1994-08-27  |  523 b   |  27 lines  |  [TEXT/PJMM]
  1. unit MyPlotIconID;
  2.     xxxx
  3.  
  4. interface
  5.  
  6.     type
  7.         IconAlignmentType = INTEGER;
  8.         IconTransformType = INTEGER;
  9.  
  10.     const
  11.         ttNone = $0;
  12.         ttDisabled = $1;
  13.         ttOffline = $2;
  14.         ttOpen = $3;
  15.         ttSelected = $4000;
  16.         ttSelectedDisabled = (ttSelected + ttDisabled);
  17.         ttSelectedOffline = (ttSelected + ttOffline);
  18.         ttSelectedOpen = (ttSelected + ttOpen);
  19.         atNone = 0;
  20.  
  21.     function PlotIconID (r: Rect; Align: IconAlignmentType; Transform: IconTransformType; TheResID: INTEGER): OSErr;
  22.     inline
  23.         $303C, $0500, $ABC9;
  24.  
  25. implementation
  26.  
  27. end.